home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…tion Library 2 (Reseller) / Apple R&P Lib Reseller v2.0.iso / 3-Demos / Tutorials / Macintosh SE⁄30 Training / Apple Macintosh SE⁄30 / Apple Macintosh SE_30 / background_111077.txt < prev    next >
Text File  |  1989-08-22  |  3KB  |  157 lines

  1. -- background: 111077 from stack: in
  2. -- bmap block id: 111110
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: indexBack
  6. ----- HyperTalk script -----
  7. on closeBackground
  8.   global mapLoc
  9.   put 23 into mapLoc
  10.   put "yes" into line 11 of field "footprints" of card "Map"
  11. end closeBackground
  12.  
  13.  
  14.  
  15. -- part 4 (button)
  16. -- low flags: 00
  17. -- high flags: 2000
  18. -- rect: left=428 top=317 right=342 bottom=456
  19. -- title width / last selected line: 0
  20. -- icon id / first selected line: 18611 / 18611
  21. -- text alignment: 1
  22. -- font id: 0
  23. -- text size: 12
  24. -- style flags: 0
  25. -- line height: 16
  26. -- part name: prev
  27. ----- HyperTalk script -----
  28. on mouseUp
  29.   visual scroll right
  30.   go prev
  31. end mouseUp
  32.  
  33.  
  34.  
  35. -- part 5 (button)
  36. -- low flags: 00
  37. -- high flags: 2000
  38. -- rect: left=455 top=317 right=342 bottom=483
  39. -- title width / last selected line: 0
  40. -- icon id / first selected line: 18612 / 18612
  41. -- text alignment: 1
  42. -- font id: 0
  43. -- text size: 12
  44. -- style flags: 0
  45. -- line height: 16
  46. -- part name: next
  47. ----- HyperTalk script -----
  48. on mouseUp
  49.   visual scroll left
  50.   go next
  51. end mouseUp
  52.  
  53.  
  54.  
  55. -- part 6 (button)
  56. -- low flags: 00
  57. -- high flags: 2000
  58. -- rect: left=482 top=317 right=342 bottom=510
  59. -- title width / last selected line: 0
  60. -- icon id / first selected line: 18613 / 18613
  61. -- text alignment: 1
  62. -- font id: 0
  63. -- text size: 12
  64. -- style flags: 0
  65. -- line height: 16
  66. -- part name: return
  67. ----- HyperTalk script -----
  68. on mouseUp
  69.   pop card into lastPush
  70.   if the short name of this stack is not in lastPush then
  71.     visual dissolve
  72.     go card "Map"
  73.   else
  74.     visual dissolve
  75.     go lastPush
  76.   end if
  77. end mouseUp
  78.  
  79.  
  80.  
  81. -- part 9 (field)
  82. -- low flags: 01
  83. -- high flags: 0000
  84. -- rect: left=128 top=23 right=45 bottom=508
  85. -- title width / last selected line: 0
  86. -- icon id / first selected line: 0 / 0
  87. -- text alignment: 0
  88. -- font id: 21
  89. -- text size: 18
  90. -- style flags: 0
  91. -- line height: 20
  92. -- part name: cardTitle
  93.  
  94.  
  95. -- part 14 (field)
  96. -- low flags: 01
  97. -- high flags: 0000
  98. -- rect: left=128 top=0 right=22 bottom=508
  99. -- title width / last selected line: 0
  100. -- icon id / first selected line: 0 / 0
  101. -- text alignment: 0
  102. -- font id: 21
  103. -- text size: 18
  104. -- style flags: 10240
  105. -- line height: 19
  106. -- part name: Title
  107.  
  108.  
  109. -- part 15 (button)
  110. -- low flags: 00
  111. -- high flags: A002
  112. -- rect: left=1 top=1 right=16 bottom=40
  113. -- title width / last selected line: 0
  114. -- icon id / first selected line: 0 / 0
  115. -- text alignment: 0
  116. -- font id: 3
  117. -- text size: 9
  118. -- style flags: 0
  119. -- line height: 12
  120. -- part name: Menu
  121. ----- HyperTalk script -----
  122. on mousedown
  123.   global checkedItem, clickTime
  124.   put 14 into checkedItem
  125.   mainMenu
  126.   put the ticks into clickTime
  127. end mousedown
  128.  
  129.  
  130.  
  131. -- part 16 (field)
  132. -- low flags: 01
  133. -- high flags: 0000
  134. -- rect: left=128 top=70 right=313 bottom=509
  135. -- title width / last selected line: 0
  136. -- icon id / first selected line: 0 / 0
  137. -- text alignment: 0
  138. -- font id: 2
  139. -- text size: 12
  140. -- style flags: 0
  141. -- line height: 16
  142. -- part name: cardText
  143.  
  144.  
  145. -- part 17 (field)
  146. -- low flags: 01
  147. -- high flags: 0000
  148. -- rect: left=320 top=70 right=313 bottom=509
  149. -- title width / last selected line: 0
  150. -- icon id / first selected line: 0 / 0
  151. -- text alignment: 0
  152. -- font id: 2
  153. -- text size: 12
  154. -- style flags: 0
  155. -- line height: 16
  156. -- part name: column2
  157.